object Form2: TForm2 Left = 413 Top = 258 HelpContext = 30 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsDialog Caption = 'Add Files' ClientHeight = 242 ClientWidth = 258 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 13 Top = 129 Width = 42 Height = 13 Caption = 'FileMask' end object Label2: TLabel Left = 13 Top = 158 Width = 53 Height = 13 Caption = 'Import path' end object Label3: TLabel Left = 13 Top = 100 Width = 31 Height = 13 Caption = 'Name:' end object DriveChk: TCheckBox98 Left = 112 Top = 184 Width = 104 Height = 15 Hint = 'If the drivename (e.g. C:) isn'#39't in the path, the file will be s' + 'ought for on all drives' Caption = 'DriveName in path' ParentShowHint = False ShowHint = True end object RecursiveChk: TCheckBox98 Left = 13 Top = 184 Width = 86 Height = 15 Hint = 'Scan all sub-directories of Import Path for files' Caption = 'Sub-directories' Checked = True ParentShowHint = False ShowHint = True State = cbChecked end object GroupBox2: TGroupBox Left = 108 Top = 7 Width = 138 Height = 74 Caption = 'ID3' ParentShowHint = False ShowHint = False TabOrder = 0 object ID3Artist: TCheckBox98 Left = 10 Top = 16 Width = 39 Height = 15 Caption = 'Artist' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end object ID3Title: TCheckBox98 Left = 10 Top = 33 Width = 36 Height = 15 Caption = 'Title' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end object ID3Album: TCheckBox98 Left = 10 Top = 50 Width = 45 Height = 15 Caption = 'Album' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end object ID3Year: TCheckBox98 Left = 65 Top = 16 Width = 38 Height = 15 Caption = 'Year' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end object ID3Genre: TCheckBox98 Left = 65 Top = 33 Width = 45 Height = 15 Caption = 'Genre' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end object ID3Comment: TCheckBox98 Left = 65 Top = 50 Width = 60 Height = 15 Caption = 'Comment' Checked = True Enabled = False ParentShowHint = False ShowHint = False State = cbChecked end end object GroupBox1: TGroupBox Left = 12 Top = 7 Width = 85 Height = 74 Caption = 'Naming' TabOrder = 1 object FileNameRad: TRadioButton Left = 9 Top = 21 Width = 69 Height = 17 Hint = 'Extract Artist and Title from FileName, separated by a '#39'-'#39 Caption = 'FileName' Checked = True ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = True OnClick = ID3RadClick end object ID3Rad: TRadioButton Left = 9 Top = 44 Width = 64 Height = 17 Hint = 'Use ID3 tags from MP3 songs if available instead of FileName' Caption = 'ID3 Tag' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = ID3RadClick end end object EdtFileMask: TEdit Left = 73 Top = 125 Width = 173 Height = 21 Hint = 'Enter FileMask separated by a '#39';'#39' for the files to be included i' + 'n the database' ParentShowHint = False ShowHint = True TabOrder = 2 Text = '*.mp2;*.mp3' end object ImportDirEdt: TEdit Left = 72 Top = 154 Width = 149 Height = 21 Hint = 'Scan this path for files' ParentShowHint = False ShowHint = True TabOrder = 3 end object DiskNameEdt: TEdit Left = 73 Top = 96 Width = 173 Height = 21 Hint = 'Enter a name for the song collection' ParentShowHint = False ShowHint = True TabOrder = 4 end object Button1: TFlatButton Left = 50 Top = 208 Width = 75 Height = 25 Hint = 'Scan Import Path for files to add to the database' Caption = '&Import' Default = True ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = Button1Click BevelWidth = 1 BevelWidthM = 2 BevelWidthDown = 1 end object Button2: TFlatButton Left = 130 Top = 208 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' TabOrder = 6 OnClick = Button2Click BevelWidth = 1 BevelWidthM = 2 BevelWidthDown = 1 end object BtnBrowse: TFlatButton Left = 226 Top = 154 Width = 21 Height = 22 Caption = '&>>' TabOrder = 7 OnClick = BtnBrowseClick BevelWidth = 1 BevelWidthM = 2 BevelWidthDown = 1 end object TreeScan: TTreeScanner OnFileFound = TreeScanFileFound Left = 224 Top = 11 end object MP3Info: TMP3Info GenreID = 12 Left = 200 Top = 3 end end